Top 10k strings from D.C. Current Electricity (1983)(SciCAL Software).tzx in <root> / bin / z80 / software / Sinclair Spectrum Collection TOSEC.exe / Sinclair ZX Spectrum - Utilities & Educational / Sinclair ZX Spectrum - Utilities & Educational - [TZX] (TOSEC-v2007-01-01) /
Back to the directory listing
9 ;"Incorrect entry":
3 P$="Current Ib=":
3 ;"You have got it right!":
3 ;"E.M.F. of";
3 ;"Current Ib=";
3 ;"Current I=";
3
2 U$="Volts":
2 U$="Amps":
2 RP=A*B/(A+B):
2 P$="P.D. V=":
2 P$="Current Ia=":
2 P$="Current I=":
2 I=E/(Ri+R):
2 I=E/(RP+RI):
2 H$="P.D. / Resistance"+R$+" =V / Rb":
2 H$="Current * Resistance"+R$+" =I * (Ra parallel Rb)":
2 ;"battery=";RI;"
2 ;"battery= ";E;"V"
2 ;"P.D. V=";
2 ;"Int.Res. of";
2 ;"Current Ia=";
2 ;"CORRECT!":
2 ,N0;"Galvo."'"Res:";RM;"
2 ,N0;"FSD:";FS;"mA";
2 *(T$="S"):
2
1 t$="P");" ";M$;" with a full scale"'" reading of ";NFS;" ";U$;"."
1 n(A*(B+C)/(A+B+C),2
1 Z$="(RH+1E3)/4E4":
1 Z$="(RH+.1)/6":
1 YI=(DF=N1)-(DF=N0)
1 XI=(DF=N0)-(DF=N1)
1 X,Y,DF,DF:
1 X,Y,DF,DF1:
1 VY+N1,VX+N1;"
1 V$="1E3*I-4E4*I*I":
1 V$=".1*I+6*I*I":
1 U$(N1)="V")+5
1 TN=TN+N1-3
1 T$="P");" ";M$;" giving a"'"full scale reading of ";NFS;" ";U$;"."
1 RP=A*(B+C)/(A+B+C):
1 RD=RD*1000
1 R$="series (multiplier)"
1 R$="parallel (shunt)"
1 P$="What is the P.D. across the Galvo at its full scale reading?: ":
1 P$="Resistance of galvanometer (in Ohms, Range "+
1 P$="P.D. Vb=":
1 P$="P.D. Va=":
1 P$="P.D. (in Volts) across the resistor : ":
1 P$="Int.Resistance of"+R$+"battery=":
1 P$="Full scale reading (in "+U$+") of the "+M$+" required"+
1 P$="Current I="
1 P$="Current (in mA) needed to pro- duce a full scale deflection on the galvanometer (Range 1mA- 100mA) : ":
1 P$="Current (in Amperes) flowing through the resistor : ":
1 N1;"Mistake":
1 N1;"Correct"
1 N1)-(DF=N1)),-2
1 N0,N0;(P$);
1 N0,N0;"Connect a resistor to the "'(B$);"."'"Choose a value in the range 0.5 to 5 Ohms"''" R (in Ohms)=";
1 N0,N0;" What is the value (in Ohms) of the resistor ";
1 N0,N0;" Read the voltage across the resistor (in Volts) ";
1 N0,N0;" Read Voltmeter reading (in Volts) :";
1 N0,N0;" Is a Series (multiplier) or Parallel (shunt) resistor"'
1 N0,N0;" Internal resistance of the ";(B$);"=";
1 N0,N0;" Enter the value (in Volts) of the potential difference and press ENTER... ";
1 N0,N0;" Enter the value (in Ohms) of the resistance R,and press ENTER... ";
1 N0,N0;" Enter the value (in Amperes) of the current I,and press ENTER... ";
1 N0,N0;" Incorrect entry":
1 N0)-(DF=N0)),2
1 N(VR/IM,N0):
1 N(RM*FS/100
1 N(NFS-VG,3
1 N(NFS-IM,3
1 N(IB,N1);"A"
1 N(IA,N1);"A"
1 MY+N1,MX+N1;M$
1 MINA=(FS/1000
1 M$="Voltmeter":
1 M$="Voltmeter"
1 M$="Ammeter":
1 M$="Ammeter"
1 IY,N0;P$;I$
1 IB=VA/(B+C)
1 I=E/(RP+RI+D):
1 I=E/(A+B+RI):
1 I$="6/(R+RH)":
1 I$(F)>"9")
1 H$="P.D. / Resistance"+R$+" =V / (Rb+Rc)"+R$+" =(I * Tot.Res.) / (Ra+Rb)":
1 H$="P.D. / Resistance"+R$+" =V / Ra":
1 H$="P.D. / Resistance"+R$+" =V / Ra"+R$+" =(I * Tot.Res.) / Ra":
1 H$="Lost Volts / Current"+R$+" =(EMF-(V+Vd)) / I":
1 H$="E.M.F. / Resistance"+R$+"=EMF / (Ra parallel (Rb+Rc) +Ri)":
1 H$="E.M.F. / Resistance"+R$+" =E.M.F. / ((Ra parallel Rb)+Ri)":
1 H$="E.M.F. / Resistance"+R$+" =E.M.F. / (Ra+Rb+Ri)":
1 H$="Current * Resistance"+R$+" =I * Rb":
1 H$="Current * Resistance"+R$+" =I * Ra":
1 D.C.
1 Created with Ramsoft MakeTZX
1 B$="cell":
1 B$="battery"
1 AY+N1,AX+N1;"
1 A(I),B(I),C(I):
1 ;SC;" out of ";NT
1 ;"ween the ends";
1 ;"the meter which"'
1 ;"series with it."
1 ;"resistor R is"'
1 ;"parallel with";
1 ;"of resistor R"'
1 ;"meter which is"'
1 ;"measured by the"'
1 ;"is measured by"'
1 ;"is connected in"'
1 ;"flowing through"'
1 ;"difference bet-"'
1 ;"connected in"'
1 ;"battery=";E;"V";
1 ;"battery=";
1 ;"battery= ";RI;"
1 ;"battery= ";E;"V";
1 ;"Your score so far"'
1 ;"You have not remembered..."''" RESISTANCE IS MEASURED IN OHMS"
1 ;"You have not remembered..."''" CURRENT IS IN AMPERES."
1 ;"You have not remembered..."''" P.D. IS IN VOLTS."
1 ;"What do you want to do now?";
1 ;"Type your choice (1-6)";:
1 ;"Type your choice (1-6)":
1 ;"Type your choice (1,2 or 3)"
1 ;"Type 1,2 or 3"
1 ;"Tot.Res. =";
1 ;"The potential";
1 ;"The current"'
1 ;"TEST ON OHM'S LAW";
1 ;"Switch":
1 ;"Resistance=";92
1 ;"Resistance is measured in..."
1 ;"Potential difference"'" is measured in..."
1 ;"P.D. across R V=";
1 ;"P.D. Vb =";
1 ;"P.D. Va =";
1 ;"Number out of range":
1 ;"Negligible current"'" through Voltmeter"''" So E.M.F. of ";B$;" =";
1 ;"Mistake...try again.";
1 ;"Mistake...try again":
1 ;"Mistake..."'"PD across R=New FSR - V across G = ";VR;" Volts"
1 ;"Mistake..."'"Lost Volts=E.M.F.-P.D. across R =";
1 ;"Mistake..."'"I through R=New FSR - IG = ";IR;" Amperes"
1 ;"Mistake..."'" Current = P.D. / resistance"'" = ";
1 ;"Mistake..."'" Internal resistance"'" =Lost Volts / Current"'" =";
1 ;"Mistake.."'"A ";R$;" resistor "'" is required."
1 ;"Mistake!"''" The resistance of R:"'" =Volts / Ohms"'" =";V;" / ";I'" =";R;" Ohms":
1 ;"Mistake!"''" The current through R:"'" =Volts / Ohms"'" =";V;" / ";R'" =";I;" Amperes":
1 ;"Mistake!"''" The P.D. across R:"'" =Amps * Ohms"'" =";I;" * ";R'" =";V;" Volts":
1 ;"Mistake !"''" Do you want help,"'" or to try again ?"''
1 ;"Lost Volts=";
1 ;"Lost Volts =";
1 ;"Int.res.";
1 ;"Int.res. of";
1 ;"Int.Resistance =";
1 ;"In a circuit there are three quantities that need to be considered:"
1 ;"Enter ""S""
1 ;"EXCELLENT!"
1 ;"E.M.F. E=";
1 ;"E.M.F of";
1 ;"Do you want to..."'''" (1) Be led through."''" (2) Work on your own."
1 ;"Current through R=";
1 ;"Current is measured in..."
1 ;"Current Electricity"'
1 ;"Current I=";
1 ;"Correct !":
1 ;"CURRENT,"'" measured in AMPERES"
1 ;"CORRECT":
1 ;"CIRCUIT VARIABLES"'
1 ;"AMMETERS AND VOLTMETERS"'"
1 ;"A ";P;"% success rate"''
1 ;"=0.5 Amperes":
1 ;"** D.C. **":
1 ;"* D.C. *"'
1 ;"(R)...Move wiper right.";
1 ;"(L)...Move wiper left.";
1 ;"(C)...Change component."
1 ;"(3) Return to menu"
1 ;"(2) Try another question"''
1 ;"(1) See your score"''
1 ;"(1) Change cell"''" (2) Change resistor"''" (3) See your score"
1 ;" needed? ";
1 ;" A cell provides an electro- motive force -E.M.F.- which can be used to drive a current through a circuit."'':
1 ;" ""M"" for menu";
1 ,N1;"The potential difference acrossthe bulb is measured by connect-ing a Voltmeter in parallel withit.":
1 ,N1;"The current through the bulb, when the switch is closed:"''
1 ,N1;"The P.D. across the bulb when the switch is closed:"''" =2 Volts":
1 ,N1;"""S"" to open and close switch."''" Any other key to continue."
1 ,N1;" The current flowing through a component is measured by connec-ting an ammeter in series with it."
1 ,N0;P$;H$:
1 ,N0;"Requirement:A";("n"
1 ,N0;"Question: A galvanometer of resistance ";RM;"
1 ,N0;"Mistake...P.D.=F.S.D * R.G"'" =";VG;" Volts"
1 ,N0;"Do you want to read Volts or Amps ? ";:
1 ,N0;"A ";R$;" resistor"'"of ";R;" Ohms is required";
1 ,N0;" The above diagram represents"'" a";("n"
1 ,N0;" Press ""S"" to close and open theswitch."''" Press any other key to continue":
1 ,N0;" If the switch is closed,the circuit is completed. The E.M.F.of the cell drives a current,(I)around the circuit and in doing so produces a P.D. between the bulb connections."
1 ,N0;" Choose the type of component whose resistance you want to measure:"''''" (1) Resistor"''" (2) Bulb"''" (3) Thermistor"'''" Type your choice (1,2 or 3)"
1 ,N0;" A Rheostat is a variable resistor. Its resistance can be changed by altering the positionof the sliding contact."
1 ,N0;" Resistance of bulb:"''" = P.D. / Current = 2 / .5 = 4 Ohms"
1 +"(Range ":
1 *SC/NT,N0)
1 *(U$(N1)="A"))+") : ":
1 )=X$+(".0"
1 ),N1;"Type a number & press
1 )'" =";
1 )'" =";
1 )'" = ";
1 )'" =";
1 (Z*Z-24/4E4))/2":
1 (Z*Z+4)-Z)/2":
1 (L2-L1+N1)*32
1 (I$(F)<"0"
1 '''" This section of the program offers the following options:"
1 '''" ELECTROMOTIVE FORCE and POTENTIAL DIFFERENCE, both measured in Volts"
1 '''" Type 1
1 ''" The resistance of a circuit component is its ability to resist the flow of current. Components used specifically for their resistive property are called RESISTORS."
1 ''" Current is a measure of the rate of flow of charge past any point in the circuit."
1 ''" A potential difference may be thought of as a ""pressure difference"". An E.M.F. can forcea current to flow through a circuit component,thus creating a potential difference across it."
1 ''" Number of correct answers...";SC
1 ''" (1) Introduction to symbols"''" (2) Test on Ohm's Law"''" (3) Internal resistance"''" (4) Series and parallel"''" (5) Shunts and multipliers"''" (6) Measurement of resistance"
1 ''" (R) Contact to Right"'" (L) Contact to left"'''"Any other key to return to menu."
1 ''" RESISTANCE,"'" measured in OHMS"
1 ''" (1) A tester"''" (2) A design aid"
1 '" Number of responses made....";NT
1 #N1;" PRESS ANY KEY,(""M"" for menu)";:
1 "Well done,but why not try a few more?"
1 "SERIES AND PARALLEL CONNECTIONS
1 "If you do not understand the questions read the booklet whichaccompanies this program and tryagain."
1 "E.M.F. and Internal resistance..
1 " What do you want to do now
1 " R=V across R / I through R =";
1 " SHUNTS AND MULTIPLIERS
1 " RESISTANCE MEASUREMENT"'"
1 " R=V / I through R =";
1 " CIRCUIT SYMBOLS
1 " RESISTANCE"'"
1 gives a full"'"scale deflection when a current of ";FS;"mA passes through it."
1 PLEASE WAIT, WHILE THE
1 1983 SciCAL Software Ltd."
1 1983 SciCAL Software Ltd"
1 MAIN PROGRAM LOADS
1 Lost volts"'"